;; hello world
(defun hello-world ()
  (format t "hello, world"))

;; test princ
(princ "hello, world")
